PC Gamer (Italian) 48/PC Gamer IT CD 48 2-2.iso/utility/nmail28u/DISK1/_SETUP.1/NETMAIL.EXE/0/RCDATA/TMAINFORM/TMAINFORM.txt

Text File | 1999-09-10 | 28.7 KB | 901 lines

object MainForm: TMainForm
  Left = 107
  Top = 111
  HelpContext = 10
  AutoScroll = False
  ClientHeight = 303
  ClientWidth = 604
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  FormStyle = fsMDIForm
  HelpFile = 'netmail.hlp'
  Menu = MainMenu1
  WindowState = wsMaximized
  WindowMenu = Window1
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object img: TImage
    Left = 1
    Top = 28
    Width = 58
    Height = 35
    Picture.Data = {<image000.bmp>}
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 604
    Height = 29
    Align = alTop
    Alignment = taLeftJustify
    BevelInner = bvRaised
    BevelOuter = bvNone
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object SpeedButton2: TSpeedButton
      Left = 6
      Top = 2
      Width = 87
      Height = 25
      Caption = 'Check mail'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00550B30555000
        0000557F57F557777777550B305508888880557F57F575555557550B30508888
        8805557F57F7FFFFFF75550B300000000055557F5777777777F5550300000000
        0055557F7777777777F55500780F0F0F70555F777577F7F7F7F50078880F0F0F
        705577755577F7F7F7F50888880F0F0F70557F555F77F7F7F7F50888080F0F0F
        70557F557F77F7F7F7F50888980F0F0F70557F557F77F7F7F7F5088898007070
        70557F557F77F757575508889880077705557F5F7F5775FF7555089998888000
        55557F777F555777555508999888075555557577755F77555555508888075555
        5555575FFF775555555555000755555555555577775555555555}
      NumGlyphs = 2
      OnClick = CheckMail2Click
    end
    object SpeedButton1: TSpeedButton
      Left = 182
      Top = 2
      Width = 87
      Height = 25
      Caption = 'Get News'
      Enabled = False
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        0000377777777777777707FFFFFFFFFFFF70773FF33333333F770F77FFFFFFFF
        77F07F773FF3333F77370FFF77FFFF77FFF07F33773FFF7733370FFFFF0000FF
        FFF07F333F77773FF3F70FFF70EEEE07F9F07F3F7733337737F70F707FFFFFF7
        97F07F7733333FFF7737007EEEE3000EE70977FFFFFF777FFF37077777307080
        77907777777737377773307EE307088809033773FF7F7FF37733337030070088
        07333337777F77377FFF33337008080809993333377F7F737777333330080088
        03333333377F77337FF333333308088809333333337373F3773F333333308080
        33933333333737F7337333333333000333393333333377733337}
      NumGlyphs = 2
      Visible = False
    end
    object Label1: TLabel
      Left = 419
      Top = 6
      Width = 85
      Height = 13
      Caption = 'Mailbox and news'
      Visible = False
    end
    object SBSend: TSpeedButton
      Left = 94
      Top = 2
      Width = 87
      Height = 25
      Caption = 'Send'
      Enabled = False
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        0000377777777777777707FFFFFFFFFFFF70773FF33333333F770F77FFFFFFFF
        77F07F773FF3333F77370FFF77FFFF77FFF07F33773FFF7733370FFFFF0000FF
        FFF07F333F77773FF3F70FFF70EEEE07F9F07F3F7733337737F70F707FFFFFF7
        97F07F7733333FFF7737007EEEE3000EE70977FFFFFF777FFF37077777307080
        77907777777737377773307EE307088809033773FF7F7FF37733337030070088
        07333337777F77377FFF33337008080809993333377F7F737777333330080088
        03333333377F77337FF333333308088809333333337373F3773F333333308080
        33933333333737F7337333333333000333393333333377733337}
      NumGlyphs = 2
      OnClick = SBSendClick
    end
    object Label2: TLabel
      Left = 187
      Top = 3
      Width = 130
      Height = 24
      Caption = 'NetMail! 2.84'
      Font.Charset = RUSSIAN_CHARSET
      Font.Color = clGray
      Font.Height = -21
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsItalic]
      ParentFont = False
      Transparent = True
      OnClick = VistaOnline1Click
    end
    object Panel2: TPanel
      Left = 522
      Top = 1
      Width = 81
      Height = 27
      Align = alRight
      BevelOuter = bvNone
      TabOrder = 0
      object ExplorerButton5: TExplorerButton
        Left = 13
        Top = 0
        Width = 60
        Height = 27
        NoFocusBitmap.Data = {
          96010000424D9601000000000000760000002800000014000000180000000100
          0400000000002001000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
          7777777700007777777777777777777700007777777777777777777700007777
          7777777777777777000077777777777777777777000000007EEEEEEEEEEE0000
          0000777076666666666008770000777076666666666008770000777076666666
          666008770000777076B666666660087700007770766666666660087700007770
          76B66666666008770000777076B66666666008770000777076B6666666600877
          0000777076666666666008770000777076666666666008770000777076666666
          6660087700007770766666666660087700007770766666666660087700007770
          7666666666600877000077707666666666600877000077707777777777770877
          0000777000000000000008770000777777777777777777770000}
        Bitmap.Data = {
          96010000424D9601000000000000760000002800000016000000180000000100
          0400000000002001000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
          7777777777007777777777777777770007007777777777777777706607007777
          7777777777770666070077777777777777706666070000007777777777066666
          07007770EEEEEEEEEE66666607007770EEEEEEEEEE66666607007770EEEEEEEE
          EE6666B607007770EEEEEEEEEE6666B607007770EEEEEEEEEE6666B607007770
          EEEEEEEEEE66666607007770EEEEEEEEEE66666607007770EEEEEEEEEE666666
          07007770EEEEEEEEEE66666607007770EEEEEEEEEE66666607007770EEEEEEEE
          EE66667707007770EEEEEEEEEE66670077007770EEEEEEEEEE66707777007770
          EEEEEEEEEE67087777007770EEEEEEEEEE700877770077700000000000000877
          7700777000000000000007777700777777777777777777777700}
        Caption = ' Exit'
        DisabledBitmap.Data = {
          96010000424D9601000000000000760000002800000016000000180000000100
          0400000000002001000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
          7777777777007777777777777777770007007777777777777777706607007777
          7777777777770666070077777777777777706666070000007777777777066666
          07007770EEEEEEEEEE66666607007770EEEEEEEEEE66666607007770EEEEEEEE
          EE6666B607007770EEEEEEEEEE6666B607007770EEEEEEEEEE6666B607007770
          EEEEEEEEEE66666607007770EEEEEEEEEE66666607007770EEEEEEEEEE666666
          07007770EEEEEEEEEE66666607007770EEEEEEEEEE66666607007770EEEEEEEE
          EE66667707007770EEEEEEEEEE66670077007770EEEEEEEEEE66707777007770
          EEEEEEEEEE67087777007770EEEEEEEEEE700877770077700000000000000877
          7700777000000000000007777700777777777777777777777700}
        Layout = blBitmapLeft
        Options = [boMonoDisplay, boPopupMark, boShowBevel]
        OnClick = ExplorerButton5Click
        IBitmap = {
          424D560A00000000000036000000280000001F0000001B000000010018000000
          0000200A0000000000000000000000000000000000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFFFFFFFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000000000000000BFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFFFFFFF7F7F7FBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000FFFFFFFFFFFF000000BFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFFFFFFF7F7F7F7F7F7FBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000FFFFFFFFFFFFFFFFFF000000
          BFBFBFBFBFBFBFBFBFFFFFFF7F7F7F7F7F7F7F7F7FFFFFFFFFFFFFFFFFFFFFFF
          FFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFF
          000000BFBFBFFFFFFF7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7FFFFF
          FFFFFFFFBFBFBFBFBFBFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBF00000000
          0000000000000000BFBFBFBFBFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFF0000007F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F
          7F7F7F7FFFFFFFBFBFBFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBF000000FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFF0000007F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F
          7F7F7F7F7F7F7FFFFFFFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBF000000FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFF7F7F7F7F7F7F7F7F7FBFBFBFBFBFBF7F7F7F7F7F
          7F7F7F7F7F7F7F7F7F7FFFFFFFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBF000000FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFF000000FFFFFF7F7F7F7F7F7FBFBFBFBFBFBFBFBFBF7F7F
          7F7F7F7F7F7F7F7F7F7FFFFFFFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBF000000FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFF000000
          FFFFFFFFFFFFFFFFFF000000000000FFFFFF7F7F7FBFBFBFBFBFBFBFBFBFBFBF
          BF7F7F7F7F7F7F7F7F7FFFFFFFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBF000000FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFF000000000000FFFFFFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BF7F7F7F7F7F7F7F7F7FFFFFFFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBF000000FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFF000000000000FFFFFFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BF7F7F7F7F7F7F7F7F7FFFFFFFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBF000000FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFF000000000000FFFFFFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BF7F7F7F7F7F7F7F7F7FFFFFFFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBF000000FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFF000000000000FFFFFFBFBFBFBFBFBFBFBFBFBFBFBF7F7F
          7F7F7F7F7F7F7F7F7F7FFFFFFFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBF000000FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFF000000000000FFFFFFBFBFBF7F7F7F7F7F7F7F7F7F7F7F
          7F7F7F7F7F7F7FFFFFFFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBF000000FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFF000000000000FFFFFFBFBFBF7F7F7F7F7F7F7F7F7F7F7F
          7F7F7F7F7F7F7FFFFFFFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBF000000FFFFFFFFFFFFFFFFFF000000BFBFBFBFBFBFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFF000000000000FFFFFFBFBFBF7F7F7F7F7F7F7F7F7F7F7F
          7FFFFFFFFFFFFFBFBFBFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFF000000000000BFBFBFFFFFFF
          FFFFFFFFFFFFFFFFFF000000000000FFFFFFBFBFBFFFFFFFFFFFFFFFFFFFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000BFBFBF
          FFFFFFFFFFFFFFFFFF000000000000FFFFFFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000
          BFBFBFFFFFFFFFFFFF000000000000FFFFFFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000
          000000BFBFBFFFFFFF000000000000FFFFFFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBF000000000000000000000000000000000000000000000000000000
          000000000000BFBFBF000000000000FFFFFFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBF000000000000000000000000000000000000000000000000000000
          000000000000000000000000000000FFFFFFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F7FBF0000007E7FBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F7FBF000000}
      end
    end
    object ComboBox1: TComboBox
      Left = 474
      Top = 3
      Width = 54
      Height = 21
      Ctl3D = False
      ItemHeight = 13
      Items.Strings = (
        'In'
        'Out'
        'Trush')
      ParentCtl3D = False
      TabOrder = 1
      Visible = False
    end
  end
  object Edit57: TEdit
    Left = 182
    Top = 194
    Width = 169
    Height = 13
    HelpContext = 10
    BorderStyle = bsNone
    Color = clSilver
    Ctl3D = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clGray
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 1
    Text = 'http://www.vista.ru/netmail.htm'
    Visible = False
  end
  object MainMenu1: TMainMenu
    Left = 150
    Top = 68
    object Message1: TMenuItem
      Caption = '&File'
      object NewMessage2: TMenuItem
        Caption = 'New Message'
        ShortCut = 16462
        OnClick = NewMessage2Click
      end
      object Reply1: TMenuItem
        Caption = '&Reply'
        ShortCut = 16466
        OnClick = ReplyBtnClick
      end
      object Send1: TMenuItem
        Caption = 'Send Again'
        OnClick = Send1Click
      end
      object SendImediatly1: TMenuItem
        Caption = 'Send Immediately'
        OnClick = SendImediatly1Click
      end
      object OpenAttachment1: TMenuItem
        Caption = 'Attach File'
        ShortCut = 16449
        OnClick = OpenAttachment1Click
      end
      object N11: TMenuItem
        Caption = '-'
      end
      object CheckMail1: TMenuItem
        Caption = 'Check &Mail '
        ShortCut = 16461
        OnClick = CheckMail2Click
      end
      object SendQue1: TMenuItem
        Caption = 'Send All &Queued Messages'
        ShortCut = 16468
        OnClick = SendQue1Click
      end
      object N17: TMenuItem
        Caption = '-'
      end
      object CheckandSend1: TMenuItem
        Caption = 'C&heck and Send'
        OnClick = CheckandSend1Click
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object Save1: TMenuItem
        Caption = '&Save'
        ShortCut = 16467
        OnClick = Save1Click
      end
      object Delete1: TMenuItem
        Caption = 'Delete'
        OnClick = Delete1Click
      end
      object Close1: TMenuItem
        Caption = '&Close'
        ShortCut = 16471
        OnClick = Close1Click
      end
      object N3: TMenuItem
        Caption = '-'
      end
      object Print1: TMenuItem
        Caption = '&Print'
        ShortCut = 16464
        OnClick = Print1Click
      end
      object N10: TMenuItem
        Caption = '-'
      end
      object Exit1: TMenuItem
        Caption = 'E&xit'
        ShortCut = 16465
      end
    end
    object News1: TMenuItem
      Caption = 'News'
      Visible = False
      object Opennewshost1: TMenuItem
        Caption = 'Open news host'
        object Enterhostname1: TMenuItem
          Caption = 'Enter host name'
        end
      end
      object GetNewsgroup1: TMenuItem
        Caption = 'Get Newsgroup'
      end
      object Addnewsgroup1: TMenuItem
        Caption = 'Add Newsgroup'
      end
      object RemoveNewsgroup1: TMenuItem
        Caption = 'Remove Newsgroup'
      end
      object N20: TMenuItem
        Caption = '-'
      end
      object GetNews1: TMenuItem
        Caption = 'Get More Messages'
        Visible = False
      end
      object N18: TMenuItem
        Caption = '-'
      end
      object Savenewsheaders1: TMenuItem
        Caption = 'Save news headers'
      end
      object DownloadNewsMessages1: TMenuItem
        Caption = 'Download News Messages'
      end
      object N13: TMenuItem
        Caption = '-'
        Visible = False
      end
      object Post1: TMenuItem
        Caption = 'Post Reply'
      end
      object MailReply1: TMenuItem
        Caption = 'Mail Message Reply'
      end
      object PostandMailReply1: TMenuItem
        Caption = 'Post and Mail Reply'
      end
      object N19: TMenuItem
        Caption = '-'
      end
      object Filtermessages1: TMenuItem
        Caption = 'Filter messages'
      end
      object Addtoaddressbook1: TMenuItem
        Caption = 'Add to addressbook'
      end
    end
    object Edit1: TMenuItem
      Caption = '&Edit'
      object EditCutItem: TMenuItem
        Caption = 'Cut'
        Hint = 'Delete selected item'
        ShortCut = 16472
        OnClick = EditCutItemClick
      end
      object EditCopyItem: TMenuItem
        Caption = 'Copy'
        Hint = 'Copy selected item to clipboard'
        ShortCut = 16451
        OnClick = EditCopyItemClick
      end
      object EditPasteItem: TMenuItem
        Caption = 'Paste'
        Hint = 'Paste contents of clipboard'
        ShortCut = 16470
        OnClick = EditPasteItemClick
      end
      object EditUndoItem: TMenuItem
        Caption = 'Undo'
        Hint = 'Undo the last action'
        ShortCut = 16474
        OnClick = EditUndoItemClick
      end
      object SelectAll1: TMenuItem
        Caption = 'Select All'
        OnClick = SelectAll1Click
      end
      object N8: TMenuItem
        Caption = '-'
      end
      object Find1: TMenuItem
        Caption = 'Find text'
        OnClick = Find1Click
      end
      object FindNext1: TMenuItem
        Caption = 'Find again'
        ShortCut = 114
        OnClick = FindNext1Click
      end
      object N2: TMenuItem
        Caption = '-'
        Visible = False
      end
      object Addrecord1: TMenuItem
        Caption = 'Add '
        Visible = False
      end
      object Edit2: TMenuItem
        Caption = 'Edit'
        Visible = False
      end
      object Delete2: TMenuItem
        Caption = 'Delete'
        Visible = False
      end
      object N16: TMenuItem
        Caption = '-'
        Visible = False
      end
      object Next2: TMenuItem
        Caption = '&Next'
        ShortCut = 120
        Visible = False
      end
      object Previous2: TMenuItem
        Caption = '&Previous'
        ShortCut = 121
        Visible = False
      end
      object Forward1: TMenuItem
        Caption = '&Forward'
        ShortCut = 16454
        Visible = False
      end
      object Redirect1: TMenuItem
        Caption = 'Re&direct'
        Visible = False
      end
      object N15: TMenuItem
        Caption = '-'
      end
      object Sortby1: TMenuItem
        Caption = 'Sort by'
        object Status1: TMenuItem
          Caption = 'Status'
          OnClick = Status1Click
        end
        object Date1: TMenuItem
          Caption = 'Date'
          OnClick = Date1Click
        end
        object email1: TMenuItem
          Caption = 'E.mail'
          OnClick = email1Click
        end
        object Subject1: TMenuItem
          Caption = 'Subject'
          OnClick = Subject1Click
        end
        object FirstName1: TMenuItem
          Caption = 'First Name'
          Visible = False
        end
        object LastName1: TMenuItem
          Caption = 'Last Name'
          Visible = False
        end
        object Company1: TMenuItem
          Caption = 'Company'
          Visible = False
        end
        object URL1: TMenuItem
          Caption = 'URL'
          Visible = False
        end
        object Note1: TMenuItem
          Caption = 'Note'
          Visible = False
        end
        object Grouplist1: TMenuItem
          Caption = 'Group list'
          OnClick = Grouplist1Click
        end
        object N21: TMenuItem
          Caption = '-'
        end
        object Unsorted1: TMenuItem
          Caption = 'Unsorted'
          OnClick = Unsorted1Click
        end
      end
    end
    object Mailbox1: TMenuItem
      Caption = 'Mail&box'
      object IN1: TMenuItem
        Tag = 1
        Caption = 'In'
        OnClick = Message2Click
      end
      object Out1: TMenuItem
        Tag = 2
        Caption = 'Out'
        OnClick = Message2Click
      end
      object Tr1: TMenuItem
        Tag = 3
        Caption = 'Trash'
        OnClick = Message2Click
      end
      object N7: TMenuItem
        Tag = -1
        Caption = '-'
      end
      object New1: TMenuItem
        Tag = -1
        Caption = '&New'
        OnClick = New1Click
      end
    end
    object Transfer1: TMenuItem
      Caption = '&Transfer'
      object In2: TMenuItem
        Tag = 1
        Caption = 'In'
        OnClick = Transfer1Click
      end
      object Out2: TMenuItem
        Tag = 2
        Caption = 'Out'
        OnClick = Transfer1Click
      end
      object Trash1: TMenuItem
        Tag = 3
        Caption = 'Trash'
        OnClick = Transfer1Click
      end
      object N14: TMenuItem
        Caption = '-'
      end
    end
    object Address1: TMenuItem
      Caption = 'Addresses'
      object AddressBook1: TMenuItem
        Caption = 'Address Book'
        OnClick = AddressBook1Click
      end
      object Stoplistdatabase1: TMenuItem
        Caption = 'Stop List Database'
        OnClick = Stoplistdatabase1Click
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object ImportAddress1: TMenuItem
        Caption = 'Import Address'
        OnClick = ImportAddress1Click
      end
    end
    object Tools1: TMenuItem
      Caption = 'Tools'
      object Filter1: TMenuItem
        Caption = 'Filters'
        OnClick = Filter1Click
      end
      object Filters1: TMenuItem
        Caption = 'Apply Filters'
        OnClick = Filters1Click
      end
      object Mailboxes1: TMenuItem
        Caption = 'Mailboxes'
        OnClick = Mailboxes1Click
      end
      object N5: TMenuItem
        Caption = '-'
      end
      object Emailextractor1: TMenuItem
        Caption = 'E.mail, URL, News Search'
        Visible = False
      end
      object EmailWEBscanner1: TMenuItem
        Caption = 'E.mail WEB Scanner'
        Visible = False
      end
      object FTPCommnder1: TMenuItem
        Caption = 'FTP - Commander'
        Visible = False
      end
      object N12: TMenuItem
        Caption = '-'
        Visible = False
      end
      object Preferences1: TMenuItem
        Caption = 'Preferences'
        OnClick = Preferences1Click
      end
    end
    object Window1: TMenuItem
      Caption = '&Window'
      object Tile1: TMenuItem
        Caption = '&Tile'
        OnClick = Tile1Click
      end
      object Cascade1: TMenuItem
        Caption = '&Cascade'
        OnClick = Cascade1Click
      end
      object CloseAll1: TMenuItem
        Caption = 'Close &All'
        OnClick = CloseAll1Click
      end
      object ArrangeIcons1: TMenuItem
        Caption = 'Arrange Icons'
        OnClick = ArrangeIcons1Click
      end
      object N9: TMenuItem
        Caption = '-'
      end
      object Next1: TMenuItem
        Caption = '&Next'
        ShortCut = 117
        OnClick = Next1Click
      end
      object Previous1: TMenuItem
        Caption = '&Previous'
        ShortCut = 8309
        OnClick = Previous1Click
      end
    end
    object Help1: TMenuItem
      Caption = '&?'
      object About1: TMenuItem
        Caption = '&About'
        OnClick = About1Click
      end
      object Help2: TMenuItem
        Caption = 'NetMail! Help'
        OnClick = Help2Click
      end
      object VistaOnline1: TMenuItem
        Caption = 'www.vista.ru'
        OnClick = VistaOnline1Click
      end
    end
  end
  object AttachmentManager: TAttachmentManager
    Left = 74
    Top = 74
  end
  object Mailbox: TNMailBox
    CurrentMailBoxNumber = 0
    CurrentMailBoxMessages = 0
    CurrentNMailBoxSize = 0
    CurrentNMailBoxTrash = 0
    Msg_Lines = 0
    Msg_Size = 0
    Msg_Number = 0
    Msg_Part = 0
    Msg_Flag = #0
    Msg_AttachStart = 0
    Msg_AttachEnd = 0
    Left = 18
    Top = 72
  end
  object SystemTimer: TTimer
    Interval = 60000
    OnTimer = SystemTimerTimer
    Left = 184
    Top = 150
  end
  object OpenDialog1: TOpenDialog
    Left = 218
    Top = 54
  end
  object SaveDialog1: TSaveDialog
    Left = 298
    Top = 46
  end
  object TableNameMenu: TTable
    DatabaseName = 'VistaMail'
    TableName = 'NameMenu'
    TableType = ttParadox
    Left = 408
    Top = 34
    object TableNameMenuPosM: TIntegerField
      FieldName = 'PosM'
    end
    object TableNameMenuMCaption: TStringField
      FieldName = 'MCaption'
      Size = 40
    end
    object TableNameMenuMDIPosM: TIntegerField
      FieldName = 'MDIPosM'
    end
  end
  object QdbMess: TQuery
    DatabaseName = 'VistaMail'
    SQL.Strings = (
      'Update  dbMess set'
      'InOutTrash=:a0  where PosM=:a1')
    Params.Data = {010002000261300003040000000000000002613100030400000000000000}
    Left = 412
    Top = 124
  end
  object QSendQueued: TQuery
    DatabaseName = 'VistaMail'
    Left = 410
    Top = 174
  end
  object QueryNameMenu: TQuery
    DatabaseName = 'vistamail'
    SQL.Strings = (
      'select  N.PosM ,  N.MCaption,   M.MCaption,'
      ' M.MDIPosM  from'
      'NAMEMENU N,NAMEMENU M'
      'where N.PosM = M.MDIPosM')
    Left = 476
    Top = 44
    object QueryNameMenuPosM: TIntegerField
      FieldName = 'PosM'
    end
  end
  object PrintDialog: TPrintDialog
    Left = 252
    Top = 52
  end
  object Tpoisk: TTable
    DatabaseName = 'VistaMail'
    TableName = 'Dbmess'
    TableType = ttParadox
    Left = 368
    Top = 50
    object TpoiskInOutTrash: TIntegerField
      FieldName = 'InOutTrash'
    end
    object TpoiskPosM: TAutoIncField
      FieldName = 'PosM'
    end
    object TpoiskEnabledToSend: TBooleanField
      FieldName = 'EnabledToSend'
    end
    object TpoiskSubject: TStringField
      FieldName = 'Subject'
      Size = 100
    end
    object TpoiskWhen: TDateTimeField
      FieldName = 'When'
    end
    object TpoiskSost: TBooleanField
      FieldName = 'Sost'
    end
    object TpoiskSend: TBooleanField
      FieldName = 'Send'
    end
    object TpoiskPriority: TIntegerField
      FieldName = 'Priority'
    end
    object TpoiskAttachment: TBooleanField
      FieldName = 'Attachment'
    end
    object TpoiskSize: TIntegerField
      FieldName = 'Size'
    end
    object TpoiskMsgDate: TStringField
      FieldName = 'MsgDate'
      Size = 25
    end
    object TpoiskRBSinglemaillist: TBooleanField
      FieldName = 'RBSinglemaillist'
    end
    object TpoiskAttachStart: TIntegerField
      FieldName = 'AttachStart'
    end
    object TpoiskAttachEnd: TIntegerField
      FieldName = 'AttachEnd'
    end
    object TpoiskPosBegin: TIntegerField
      FieldName = 'PosBegin'
    end
    object TpoiskSizeMessage: TIntegerField
      FieldName = 'SizeMessage'
    end
    object TpoiskWhenSend: TDateTimeField
      FieldName = 'WhenSend'
    end
    object TpoiskWho: TStringField
      FieldName = 'Who'
      Size = 50
    end
  end
  object GoToWeb1: TGoToWeb
    Url = 'http://www.vista.ru/netmail.htm'
    EMail = '[e-mail]'
    BrowserState = gwMaximized
    Left = 274
    Top = 132
  end
end